CREATE OR REPLACE FUNCTION consultarparticipantes(integer)
  RETURNS SETOF participantes AS
$BODY$
DECLARE 
	iClave 		ALIAS FOR $1;
	Miembros 	participantes;
	sSqlText1	varchar;
	xEmpresas	RECORD;
	xBecarios	RECORD;
	xInvestigadores	RECORD;
BEGIN

	FOR xEmpresas in Select Nombre from empresas where claveproyecto=iClave and Nombre<>''LOOP
		Miembros.empresas=xEmpresas.Nombre;
		RETURN NEXT MIEMBROS;
	END LOOP;

	FOR xBecarios in Select Nombre from becarios where claveproyecto=iClave and Nombre<>'' LOOP
		Miembros.becarios=xBecarios.Nombre;
		RETURN NEXT MIEMBROS;
	END LOOP;

	FOR xInvestigadores in Select Nombre from investigadores where claveproyecto=iClave and Nombre<>'' LOOP
		Miembros.investigadores=xInvestigadores.Nombre;
		RETURN NEXT MIEMBROS;
	END LOOP;
		
--RETURN NEXT MIEMBROS;
end;
$BODY$
  LANGUAGE plpgsql VOLATILE
  COST 100
  ROWS 1000;
ALTER FUNCTION consultarparticipantes(integer) OWNER TO postgres;